        Dim add1 = Function(num As Integer) num + 1